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Program Number: C2-155 
9 December 1959 



TITLE: Roots of N tjl Degree Polynomials , where 3 - N <. 10 

AUTHOR : G.P. Becker 

Link Aviation, Incorporated 

DATE: 9 December 1959 



Purpose: 

1. To find the zeros (real and complex) of a polynomial of 
degree N, where 3 ^ N 1 10. The coefficients of the polynomial 
must be real, and the leading coefficient must be unity. 

2. To reform the second (a^) and the last (ajj) coefficient from 
the computed roots so that some indication of the accuracy 
will be given. 

Program Description: 

The program is based on Bairstow's Method which is described in: 

a) Introduction to Numerical Analysis, F.B. Hildebrand 

McGraw-Hill, 1956, (page U72-li76) 

b) Numerical Calculus, W.E. Milne 

Princeton Univ. Press, 19U9 

Basically the program attempts to find quadratic factors 
(X^ + Px + Q) that divide the original polynomial with a 
zero remainder. The following recurrsive equations are used 
to determine the final P and Q for each factor. 

1. bi = a ± - Pbi_! - Q bi_ 2 < i < N; (b_ x = b_ 2 = 0) 

2. c ± = bi - Pci_i - Q Ci_ 2 < i < Nj (c_i = c_ 2 = 0) 

3. C N _i = - PC N _ 2 - QC N _3 

. 2 

k. D - C N _ 2 - C N _i C N _ 3 

5. AP = (b N _-L C N _ 2 - b N C N _ 3 ) / D 

6. -AQ = (b N _i C N _i - b N C N _ 2 ) / D 

7. P' = P + AP 

8. Q' = Q- (-AQ) 
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When a set of P and Q are found the original polynomial is 
reduced and the process continues. The coefficients of the 
new polynomial are b , b^, •••, ^n_2* 

Each iteration is continued until both /P/ and /Q/ are less 
than .000001. 



Auxiliary Programs Required: 

1. Floating Point Interpretive System (2li.0)-in O^OO-p. 

2. Floating Point Data Input - Output (11.6-12.6) in 1!?00 D . 

3. Floating Point Complex Operations (22.1) in 2200 D . 

If the above programs are not stored in the locations listed 
it will be necessary to change this program as follows: 

All XR0500-XUO£00 sequences must be changed so that they 
will read XR and XU to the L of the Floating Point Inter- 
pretive System. 

All XR2200-XU2200 sequences must be changed so that they 
will read XR and XU to the L of the Floating Point Complex 
Operations subroutine. 

Limitations: 

Closely spaced roots or multiple roots will cause D in equation 
i; to be zero, and the division by zero stop in program 21^.0 will 
be operative. 

The calculation of the auxiliary quantities b^ and c^ may exceed 
the range of 2k. 0. This may be eliminated by rescaling the 
variable (i.e., let x = lOy). 

Failure to converge will be indicated by the input light coming 
on. This is the floating print input \ a new tolerance may be 
inserted into Lo + 0759 and the program will continue. Alternately, 
try "Lin's Method". 

No other restrictions are imposed upon the program. The method has 
some inherrent restrictions but this author has not found a clear 
definition of these restrictions. 

Operating Procedures: 

See pages A and B attached. 
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Input Format: 



1. Store a , a]_, a2, ..., a N in floating point format 
starting in Lo + 0900. NOTE: a = 1. 

2. Store N@ 29. This must be placed on the data tape after 
the floating point data and in the form 0000000N H '. The 
program will store it in the proper location. Note that 
N H is in hex, e.g., for a quintic, % is OOOOOOlli'. 



Output Format: 



1. The zeros of the polynomial in floating point format. 
The zeros will be in the form A ± Bi. 

2. The reformed (-a-^) and a N will also be printed in the 
form A + Bi. 



Total Storage: 

Approximately II2 tracks. 

0900 - 0910 Storage of the coefficients of the given polynomial. 

0911 - 0921 Working cells for the coefficients. 

0939 - 093U Storage of the b's. 

0939 - O9J47 Storage of the c's. 

09U8 P (preliminary computations). 

O9I49 Q (preliminary computations). 

0950 AP 

0951 AQ 

0952 D 

0953 - 1008 Real and complex parts of the roots. 
1009 - 1018 P's and Q's (final results). 

Running Time: 

For 10th degree polynomials, time has ranged from 30 to 82 minutes, 
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PROGRAM OUTLIKE 



0000 - 0003 Put Floating Pt. data in. 

0832 - 0839 Clear necessary locations. 

0005 - 0006 Fixed data (N @ 29). 

0007 - OO38 Form necessary flags and counters. 

OO38 - 005U Initialize addresses. 

0100 - 0117 Set coeff in work locations. 

0118 - Ol^U Sequence to compute bj_'s. 

0200 - 0236 Sequence to compute c. 's. 

0237 - O30I4. Set up and compute cjj_i. 

0305 - 0310 Compute D. 

0311 - 0317 Compute AP. 

0318 - 0321). Compute -AQ. 

0326 - 0331 Adjust P and Q. 

0332 - 0314; Compare AP and AQ with tolerance. 

03i45 - 0352 Either AP and/or AQ out of tol-adjust iteration 

counter and go back to 0118. 

0352 - 0359 Program has completed — iterations — 

Input light asking for new tolerance — will repeat 
(to 0118) after start compute. 

0359 - OI4O5 Set P and Q in work locations — adjust addresses. 

0lt06 - OI4I3 Determine how many P and Q factors have been found. 

Ol4.ll; - 0ljl5 Only 1 root left-set P factor in proper work loc. 

OI4I6 - OI4.2O All factors found - adjust necessary flags and go 

to 0509. 

0l;21 - OU29 Only 1 set left - set P and Q factor in proper loc. 

0U30 - OI4I4.7 More than 1 set of P and Q left — move present b's 

into a working and continue. 

OLilj.8 - 0508 Adjust necessary flags and counters - clear locations 

and go back to 0118. 
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0509 - 05l5 Set up addresses to compute 1 pair of roots. 

05l6 - 06U0 Compute all roots and store them. 



Sequence solves X = - b ± Vb^ - Uac 

2, 



-a 



O6I1O - 06£6 Print out roots. 

0657 - 0755 Compute a^ and a N and print them out. 



All other locations in the interval 0000 to 0839 that have 
not been listed are used to store permanent data, addresses, 
and temporary work locations. Approx. lg track, starting 
at 0900, is used by the problem for the formation of all 
equations, P and Q factors and roots. 
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Sample Problem : 

.000U000 

Sample no. 1 - quartic with k real roots 
+001*900 » 

1 ' -0000010 ' 35 ' -00000^0 ' 2k ' -0000000 ' 
i 

000000010 ' 

.1999992 01 .0000000 00 .1000001 01 .0000000 00 
.399999k 01 .0000000 00 .3000013 01 .0000000 00 

.1000000 02 j. 0000000 00 . 21*00000 02 j. 0000000 00 

.oool*oo 

Sample no. 2 - quartic with cyclic roots 

+001*900' 

1" -0000000' 

+021*901 ' -0022220 ' 1*1*81*1*0 ' -0888800 ' 160000 ■ -0000000 ' ■ 

000000000010 ' 

.2000000 01 .0000000 00 .2000000 00 .0000000 00 
.2000000 03 .0000000 00 .2000000 02 .0000000 00 

.2222000 03 j. 0000000 00 .1600000 01* j. 0000000 00 
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.oooUooo 

Sample no. 3 - quartic with 2 pairs of complex roots 

+ohh900 l 

10000 '53990 « 677UOO ' 30880 ' 1UU600 ' -0000000 ' ' 

0000000000010 ' 

.lii363U8- 01- .I4630613 00 .1U363U8- 01- .I4630613- 00 

.2685136- 01 .7756361 01 .2685136- 01 .7756361- 01 

.5399000- 01 j. 0000000 00 .1U1;6000 02 j. 0000000 00 

.0001*000 

Sample no. h - quartic with one coefficient missing 

+00U900' 

l'l5"5'10'-00000OO' 

1 

000000000010 ' 

.3887328 00 .8526297 00 .3887328 00 .8526298- 00 

.7582531- 00 .0000000 00 .1501921- 02 .0000000 00 

.1500000- 02 j. 0000000 00 .1000002 02 j. 0000000 00 
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.0001+000 

Sample no. 5 - sixth order 

1+ complex 2 real 

+0314.900' 

1000 ' 2399 ■ £35U3 ' -018933U ' 1I+0676 « -003720I+ ' 28920 ' -0000000 ' ' 

0000000000018 ' 

.11+36350- 01- .1+630613 00 .11+36350- 01- .1+630613- 00 

.2000000 01 .0000000 00 .1000000 01 .0000000 00 

.2685137- 01 .7756360 01 .2685137- 01 .7756361- 01 



.2399000- 01 



j. 0000000 00 .2892001 02 



j. 0000000 00 



.0001*000 

Sample no. 6 - 10th order taken from POOL News - June $9 

+011+900' 

10 » -000011+9 ' 111+5 ' -00014975 ' 13956 ' -0025119 ' 
1+9789 • -00771I+7 ' 70280 • -oo51+75o '37500 • -0000000 « 

I 



0000000000028 • 














.51141858- 


01- 


.9879815 


00 


.511+1858- 


01- 


.9879816- 


00 


.13261+28 


01 


.3902158 


00 


.13261+28 


01 


.3902158- 


00 


.6305226- 


00 


.1718926 


01 


.6305226- 


00 


.1718927- 


01 


.2887559 


01 


.3883327 


01 


.2887559 


01 


.3883327- 


01 


.3917953 


01 


.3190556 


01 


.3917953 


01 


.3190556- 


01 


.11+90000 


02 


j. 0000000 


00 


.3750001 


01+ 


j. 255581+7- 


• 03 
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JOB NO. 


PROGRAM NO. 

C2-155 


PROGRAM PREPARED BY: PROGRAM CHECKED BY: 

G.P. Becker POOL Review 


DATE 

12/09/59 


PROBLEM: 

Nth Order 3iN < 10 


TRACK 

00 


PROGRAM INPUT COOES 


0. 




LOCATION 


INSTRUCTION 


OL 



h 
1(1 


CONTENTS 
OF ADDRESS 




OPERATION ADDRESS 




;, 0,0 ,0 | Lo ( , 


/ 














/, 0,0 ,0 ' 1,0 , , 




X 








0, 


,0 i 


, , x, R. Q 5, 0,0 




'■ 


Enter Fl.Pt 


. System 








|0 ,1 


. ,x,U 0, 5 , ,0 




. 












,0 ,2 


i , x,I 0, 0,0 ,0 




Data Input 










,0 ,3 


, , x,E 0, 0,0 ,0 




X 


Exit Fl. Pi 


• 








|0 i* 


. , i u 0, 8,3 ,2 




Clearing Re 


utine 








,0 ,5 
















,0 ,6 
















,0 ,7 


i i i H 0, 8,0 1 




X 


Nt at 29 










|0 |8 


i i . H ! °i 8 i° i 2 




Np at 29 










,0 ,9 


I S 1 °l 1 l^ I 8 




2 at 29 










,1,0 


( 1 i H 1 °l 8 I° t 3 




Nt-2 at 29 










,1,1 


, ., ,H . 0,8,0 }x 




X 


Np-2 at 29 










|1 |2 


i , ,D ' 0,1,5 ? 




1 at 13 










|1 |3 


i i i H i °i 8 i° £ 




Nt-2 at 16 










J i 4 


i i , H ' 0, 8 ,0 ,6 




Np-2 at 16 










,1,5 


1 . 1 A 1 °> 1 \ 6 1° 




)<]l at 16 










,1,6 


i . , H . °i 8 .° 7 




Np-1 at 16 










|1 ^^ 


, , ,H . 0,8,0 8 




Nt-1 at 16 










,1,8 


A 1 6 
i i i 1 i i i 




1 at 16 










,1 ,9 


i i i H 0, 8 ,0 9 




X 


Np at 16 










,2 ,0 


i i , H i 0, 8 ,1 ,0 




Nt at 16 










. .2 ,1 


, i |A | 0,1,6 P 




1 at 16 










|2 |2 


i i iH j Oi 8il l 




Nt+1 at 16 










i2 |3 


■ , |C . 0, 8,1 2 




X 


Np+1 16 










,2 , 4 


i . iB | 0,8,0 2 




Np at 29 










|2 t 5 


D 16 1 
i i i i i i i 




2 at 13 










|2 , 6 


i i i H °i 8 i 1 ? 




Np/2 at 16 










|2 ,7 


i i ! C ! °i 8 i 1 h- 




X 


Nt/2 at 16 










|2 i 8 


i . ,B , 0, 8 ,0 7 




Np-1 at 16 










|2 i 9 


1 1 l D ! Ol 1 ! 6 ? 




2 at 2 










,3 ,0 


i i |M , 0,1,6 2 




1 at 2 










|3 i 1 


i , , H . °, 8 i 1 P 




X 


Np-l/2 at 


16 


FORM LP-10 
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JOB NO. 


PROGRAM NO. 

C2-155 


PROGRAM PREPARED BY: 

G.P. Becker 


PROGRAM CHECKED BY: 

POOL Review 


DATE 

12/09/59 


PROBLEM: 

Nth Order 3 < N < 10 


TRACK 

00 


PROGRAM INPUT CODES 


0. 


h 
VI 


LOCATION 


INSTRUCTION 


a. 


h 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION | ADDRESS 


' 


1 
















1 


X 








0, 0,3 ,2 


I 1 1 C 1 | 8 1 1 I 6 




Nt -V2 at 1 


s 






1 |3 i 3 


| B i 0, 8,0 ,9 




Np at 16 








i |3 i < 


A 8 9 




Np at 16 








1 l 3 _i 5 


S 16 




X 


1 at 16 








1 1 3 ,6 


i i i H . 0, 8 , 1 ,7 




2Np-l at 16 








1 1 3 ,7 


1 1 1 c 1 °l 8 1 1 1 8 




2Nt-l at 16 








1 1 3 ,8 


1 | B | | 7 !^ I 6 




1009 








1 1 3 ,9 


1 . 1 Y . °l 3 I 6 I 2 




X 


c( ) 








I I 4 i 


i i , B ( 0, 7,5 ,7 




1010 








i |4 i 1 


i . 1 Y l °l k,° 1° 




c( ) 








1 I 4 I 2 


i i iB. 0, 7,5 ,8 




0953 








i i 4 i 3 


i i i Y i °i ^i^ i 6 




^ 


c( ) 








1 |4 | 4 


. i » A ! Q 1,5,7 




Uh 








1 |4 | 5 


i , i Y | q 5,5,8 




c( ) 








i |4 i 6 


i , i Aj q 1,5,7 




U H 








l |4 | 7 


i i i y, q 5,6,0 




X 


c( ) 








1 l 4 i 8 


i i , A, q 1,5,7 




h H 








1 |4 i 9 


, i , Y i Q 5, 6,2 




C ( ) 








l |5 , 


i , ,11.0 1, 0,0 












1 |5 i 1 


i i i , i i i 




X 










1 |5 i 2 


i i i 1 i i i 












i i5 i 3 


i i i | i i i 












1 |5 l 4 


i i i 1 i i i 












1 |5 i 5 


, z, 9 9, o ( o 




^ 


*n? 








i |5 i 6 


i i i z. q 9, 1,1 




a T 








l |5 i 7 


i i , z i 9 9, 2,3 




b-1 








l |5 i 8 


i i i Zi 9, 2,2 




b-2 








l i 5 i 9 


, , , z , 9 9 i 2 M 




X 


b n 








1 |6 i 


i , , Z| Q 9, 3,6 




c-1 








i |6 i 1 


i , , z i 9 9, 3,5 




c-2 








i ±6 | 2 


■ « i z , 9 9 i 3 i 7 




c 








i |6 , 3 


Z 8 2 
i i i | i i i 




x^ 


N at 29 




FORM LP-12 














X 
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RN 
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JOB NO. 


PROGRAM NO. 

C2-155 


PROGRAM PREPARED BY 

G.P. Becker 


PROGRAM CHECKED BY: 

POOL Review 


DATE 

12/09/59 


PROBLEM: 

Nth Order 3 < N < 10 


TRACK 

01 


PROGRAM INPUT COOES 


a. 


h 


LOCATION 


INSTRUCTION 


0. 

CONTENTS 

h OF ADDRESS 

ID | 


NOTES 


OPERATION ADDRESS 


1 


1 


















X 








0, 


1 ,0 i 


, , ,B 0,0,5 £ 




Lo a n 










|0 , 1 


Y 1 8 




B( ) 










,0 |2 


B 5 6 




Lo a w 










,0 ,3 


! 1 l Y 1 | 1 \ ? 


' 


X 


c( ) 










,0 | 4 


B 8 1 2 




Np+1 at 16 










,0 ,5 


i i i S i °i 1 i 6 i° 




1 at 16 










,0 ,6 


,T , 0, 1,1 ,8 














,0 ,7 


i i i C °i Si 1 ? 


/ 


X 


counter 










,0 ,8 


, i , B , t, , ,] 




a. 

i. 










,0 | 9 


. . , C , [. , ,] 




a. work 










,1,0 


. i B . °i 1 1 ° i 8 




B( ) 










,1,1 


i ! i A i o, 1,5 ,7 


' 


X 


ItH 










|1 I 2 


i i J ! °, 1 ,° , 8 




B( ) 










|1 |3 


i i i B . °i 1 1 ° ? 




c( ) 










J i 4 


i i i A i °i 1 , 5 J 




h H 










1 1 ,5 


. i Y i °i 1 1 ° i 9 


/ 


X 


c( ) 










,1,6 


i , , B t 0, 8 , 1 ,9 




counter 










i' i 7 


, u i °i 1 1 ° P 




=► 


not finished 








,1,8 


, i , B ! °i °i^ , 8 




L b-2 










|1 1 9 


i s i Y 0, 1,3 ,3 


/ 


X 


M( ) 










|2 |0 


i i , B | °i °i^ J 




Lo b-1 










i |2 i 1 


i i i Y i 0, 1,3 ,6 




M( ) 










|2 i 2 


i i i b i °i 0,5 i 6 




Lo a nT 










|2 i 3 


, . , Y 0, 1,3 ,8 




X 


B( ) 










,2 , 4 


i i , B ! 0, , 5 , 9 




Lo b n 










|2 |5 


i i i Y l °i 1 i i i i 1 




c( ) 










|2 , 6 


i i i B | 0, 8 , 1 ,1 




Nt+1 at 16 










|2 i 7 


, , , S 0, 1 , 6 ,0 




X 


1 at 16 










|2 ,8 


i i i T | 0, 2 1 ,0 














|2 |9 


i C i °i 8 1 1 i 9 




counter 










,3 , 


, ,x |R. q 5,o ,o 






■Enter Fl. 


Pt. 








|3 i 1 


x u o 5 o 




X 






FORM LP-IO 














X 


CARRIAGE RETL 


IRN 
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joe no. 


PROGRAM NO. 

C2-155 


PROGRAM PREPARED BY 

G.P. Becker 


'ROGRAH CHECKED BY: 

POOL Review 


DATE 

12/09/59 




PROBLEM: 

Nth Order 3 < N < 10 


TRACK 

01 




PROGRAM INPUT CODES 


a. 



1- 


LOCATION 


INSTRUCTION 


0. 




CONTENTS 
OF ADDRESS 


NOTES 




OPERATION ADDRESS 




1 


1 


















1 


X 










0, 


1 ,3 ,2 


1 , 1 P 1 | 9 1 ^ I 9 




Q 












|3 i 3 


, , , M I , |] 




bi-2 












|3 | 4 


1 1 | C I 1 l5 r> 






3 bi-2 










,3 | 5 


I I 1 P 1 | 9 1 ^ I 8 




X 


p 












,3 ! 6 


, , X [| ' |] 




bi-1 












,3 | 7 


c 0156 






P bi-1 










,3 | 8 


, , ,b[ [, , ,] 




a^ 












,3 | 9 


s oi55 




X 


Q bir-2 












,4 | 


i i s , °i 1 i^ i 6 




P bi-1 












,4 , 1 


, i , c [ i i i ] 




bi 












I 4 | 2 


, , x , E . 0, , ,0 




Exit Fl. Pt 


• 










,4 , 3 


i i i B . 0, 1 , 3 ,8 




X 


B( ) 












|4 i 4 


i i , A 0, 1 , 5 ,7 




k H 












|4 | 5 


Y 13 8 




B( ) 












|4 i 6 


1 ! | B , | 1 , 3 I 3 




M( ) 












i4 i 7 


i i i A i °i 1 \$ J 




X 


UH 












|4 i 8 


i i J, 0, 1,3 ,3 




M( ) 












|4 i 9 


i A i °i 1 ^ , 7 




m 




ft 










,5 | 


, ! , Y , °i 1,3 ,6 




M( ) 




>■ 
J 

u 








|5 i 1 


, i , A ° 1 1 i 5 , 7 




E 


m 




z 

c 

u 








|5 i 2 


i > , Y , °i 1 i 1 ^ i 1 




c( ) 




5 

i 








l |5 i 3 


i B i °i 8 , 1 i 9 




counter 






H 
K 








|5 i 4 


i i i u i °i 1 i 2 i 7 




— ^ 


not finished 


a. 


, ,o p 9 ( 0,00 p 


1 




|5 i 5 


[,,>.!,] 




X 














|5 i 6 


[...,...] 
















|5 i 7 


, , , , , M 




1 at 29 












|5 i 8 


, 8 




2 at 29 












|5 i 9 


, . . I*, °1 °i° i° 




X 


1 at 13 












,6 | 


! , 1 l 8 ! i° I 




1 at 16 












,6 | 1 


1 8 | | °| I 




2 at 13 












,6 i 2 


2,0 ,0 p ( 0, 0,0 ,0 




1 at 2 












,6 , 3 


h , o ,o p , o, o,o ,o 




X 


2 at 2 






FORM LP-12 












/ 


X 


CARRIAGE RETL 
CONDITIONAL S 


<RN 

TOP CODE 


■L't*t m-u.i J 1 3S4 1 1 



PREPARED FOR: 

LGP-30 RPC-UOOO USERS ORGANIZATION - POOL 


PAOE OF 

5 / 18 


JOB NO. 


PROGRAM NO. 

C2-155 


PROGRAM PREPARED BY: PROGRAM CHECKED BY: 

G.P. Becker POOL Review 


DATE 

12/09/59 


PROBLEM: 

Nth Order 3 < N < 10 


TRACK 

02 


PROGRAM INPUT CODES 


L 


h 
in 


LOCATION 


INSTRUCTION | 


0- 

CONTENTS 


NOTES 


OPERATION ADDRESS ] 




OF ADDRESS 


1 


1 


















X 











2 

|0 i o 


i ! 1 B 1 | 1 6 I 1 




Lo c-2 










|0 t 1 


, , ,Y 0,2,1,5 




M( ) 










,0 ,2 


,B 6 
i i l 1 i I > 




Lo c-1 










,0 ,3 


i i i Y | °i 2 i 1 I 8 


' 


X 


M( ) 










,0 | 4 


i . ,B. 0, 0,5 ,9 




Lo b Q 










,0 | 5 


Y 2 2 
I i i 1 i i i 




B( ) 










,0 ,6 


B 6 2 
i i i j i i i 




, a L ° °" 










,0 ,7 


i i Y i °i 2 i 2 r 3 


/ 


X 


c( ) 










,0 , 8 


s i B , °i 8 i° i 8 




Nt-1 at 16 










,0 | 9 


i i i S i °i 1 i 6 i° 




1 at 16 










,1,0 


i i . T , °i 2 i 3 J 














,1,1 


i i i C i °i 8 i 1 ? 


L^_ 


X 


counter 










1 1 t 2 


i , x,R | 0, 5,0 ,0 




")■ Enter fl. 


Pt. 








1 1 i 3 


, , x , u o, 5 , o p 




I 










.1 l 4 


i i i p , °, 9,U ? 




Q 










ll , 5 


, , ,M, t, , ,] 


/ 


><jCi- 2 










,1,6 


, , ,c| 0,1,^,5 






Q Ci-2 








|1 i 7 


. . , p 'i °i 9,^i 8 




P 










,1,8 


, , , M , [, I ,] 




Ci-1 










|1 i 9 


. i , G ' 0, 1 1 5 ,6 




X 




P Ci-1 








,2 ,0 


, , ,B ( t, , ,1 




bi 










i |2 i 1 


I 1 . s l °l 1,5 $ 




Ci-2 










|2 |2 


, , ! S | °i 1,5 ,6 




P Ci-1 










|2 t 3 


, , ,0, [, , ,] 




X 


Ci 










,2 | 4 


, , x, e, q o,o ,o 




Exit fl. p 


> • 








|2 i 5 


B 2 2 

1 1 ! 1 1 1 1 




B( ) 










|2 | 6 


, i , A ! °, x ,5 J 




h H 










i |2 i 7 


i i , Y , 0, 2 , 2 ,0 




X 


B( ) 










1 |2 i 8 


. , ,B. 0, 2,1 ,5 




M( ) 










i |2 i 9 


, i , A q 1,5 ,7 




liH 










1 |3 i 


Y 2 15 
, 1 1 1 1 1 1 




M( ) 










i |3 i 1 


. , , a o t x,5 ,7 




X 


h H 




FORM LP-IO 














X 


CARRIAGE RETl 


JRN 


•OVAL N«»ll. JUMtX 



I = CONDITIONAL STOP CODE 





PREPARED FOR: 

LGP-30 RPC - U000 USERS ORGANIZATION - PC 


0L 

[prog 

! i 

1 




PAGE OF 

6 / 


18 




JOB NO. 


PROGRAM NO. 

C2-155 


PROGRAM PREPARED BY 

G.P. Becker 


RAM CHECKEO BY 

OOL Review 


DATE 

12/09/59 




PROBLEM: 

Nth Order 3 < N < 10 


TRACK 

02 




PROGRAM INPUT CODES 




h 

VI 


LOCATION 


INSTRUCTION 


a. 
O 
1- 
i/i 


CONTENTS 
OF ADDRESS 


NOTES 




OPERATION I ADDRESS 




1 


1 








/ 
/ 
/ 

1 
1 

1 

1 
1 
1 

1 
1 
1 
1 
1 
1 












1 


X 















_^i 2 ,3 ,2 


Y 2 1 8 

i i i | i i i 





M( ) 














,3 , 3 


. ^Vr^iL 


JiH. 

c( ) 












|3 , 4 


_L_i._L T , °l 2 i 2 A 














,3 | 5 


' > > B | Oi 8 ! 1 ! 9 


X 


Counter 












I 3 1 6 


. , i U , °, 2 ,°i 9 


XI 




Not finished. 












|3 i 7 


b' 6 

1 1 1 1 1 1 1 


Lq„ q£_J1=L_ 












,3 | 8 


. i ^ A , q 8 ,° l3 . 


Nt-2 at 29 












|3 ,9 


l_i L Y , q 2 , 6 ! 1 


M( ) 












,4 , 


. J L..i.^3 1 o J 6. 


M( ) 














|4 , 1 


Y 0311 
1 1 1 1 I 1 1 


P( ) 












l< I 2 


L __i L i^AhtJ 


iiH 












,4 , 3 


Li„. ! f A 2 . 5 l 8 - 


X 


M( ) 












|4 i 4 






P( ) 












|4 | 5 


N( ) 






1 1 1 1 1 1 1 






|4 i 6 


_L± L 1 ,.. !.^!^.. 


P( ) 












,4 , 7 


, i , Y | q 3,1,8 


X 


P( ) 












|4 i 8 


, , , B , q 0,^,7 


Lo b-l 












,4 | 9 


, , , AJ q 8,0,1 


1 
1 
1 
1 




Nt at 29 




IE 









,5 | 


i i J Q 3,1,5 


N( ) 




* 








,5 | 1 


Y 3 2 2 

i i i 1 i i i 


X 


N( ) 


1 


i 

Ul 








|5 i 2 


, i , A qw 


14H 




t- 

a 

X 








|5 i 3 


, , , Y q 3,1,2 


1 
1 
1 
1 


— 


ML ) 






1- 








|5 | 4 


i i i Y i q 3, i ,9 


M( ) 













|5 | 5 


, ,x,r q 5,0,0 


K< 


]■ Enter Fl. 


Pt. 










|5 i 6 


, i x i u i q 5 ,°i° 




J 






1 1 1 1 1 1 1 






|5 | 7 


, , i p , q 9,M 


1 
1 

1 
1 
1 
1 




P 












|5 | 8 


i L _1_ M + t t J 


Cn-2 












,5 | 9 


C, Q 8 2 

i i i i i i 


k 




PCn-2 












|6 i 


1 , L P i °: 9 A 9 




Q 












,6 , 1 


, , ,K| [ ,1 


Cn-3^ 












,6 | 2 


, T , q 3 , o i 














,6,3 


i ,1,1, 0,0,0.0 


w 


-Q c n _ 3 






FORM LP-II 














X 


CARRIAGE RETL 


RN 


■<>»i *»•* 


t Jl J44 1 * 



CONDITIONAL STOP CODE 



PREPARED FOR: 

LGP-30 RPC-1|000 USERS ORGANIZATION - POOL 


PACE OF 

7 / 18 


JOB NO. 


PROGRAM NO. 

C2-155 


PROGRAM PREPAREO BY: PROGRAM CHECKED BY: 

G.P. Becker | POOL Review 


DATE 

12/09/59 


PROBLEM: 

Nth Order 3 < N < 10 


TRACK 

03 


PROGRAM INPUT CODES 


a. 


in 


LOCATION 


INSTRUCTION 


1 CONTENTS 
JJ j OF ADDRESS 


NOTES 


OPERATION ADDRESS 


1 


1 
















1 


X 








9 3,o ,o 


U 3 2 
i i i i ii i 












I |0 i 1 


, x b\ t 0,0 ,0 




+ Q Cn-3 








I 1 ,2 


i i i S , °i 8 1 2 i° 




PCn-3 








i |0 ,3 


I i i H i °| 8 i 2 I 2 


_^ 


X 




Cn-1 






I 1 | 4 


i i i C , °i 8 i 2 i 1 






Cn-1 






1 1 ,5 


i i i p ! °i 8 i 2 1 1 




Cn-1 








1 |0 ,6 


, , ,M, [, , J 




Cn-3 








1 1 | 7 


, ,x,y. q o,o ,o 


/ 


X 


-Cn-1 Cn-3 








1 1° 1 8 


. i ,p, [. . .] 




Cn-2 








i 1° 1 9 


, , |N ( [, , ,] 




Cn-2 








1 | 1 | 


i i i C i °i 9 i^i 2 




D 








i i 1 i ' 


, , .P, I ■ J 




X 


Cn-3 








I |1 |2 


, , ,m| [, , J 




bn 








I |1 I 3 


, ,x, y. q o, o,o 




-bn Cn-3 








i .1 l 4 


i , ,p, Ii , J 




Cn-2 








| |1 i 5 


, , ,N| t , ,] 


' 


X 


bn-1 








i |1 i 6 


i , ■ D, 9 9,5,2 




D 








1 L 1 l 7 


, , , c. q 9,5,0 




AP 








1 1 1 i 8 


, , ,p, I , J 




Cn-2 








1 |1 i 9 


. . iM, C . J 


' 


^ 


bn 








i |2 i 


, | x ( y p 9 | 0,0 




-bn Cn-2 








i .2 .1 


1 1 l p l °l 8 . 2 ?- 




Cn-1 








I |2 |2 


. . iN, [, , ,] 




bn-1 








I |2 |3 


, , iD. 0, 9,5 ,2 




X 


D 








1 |2 i 4 


, , i c i °. 9,5 p. 




-AQ 








1 |2 |5 


i i i u | 0, 3 1 2 ,6 












1 |2 i 6 


i i |B, 0, 9,1+ ,8 




P 








i |2 i 7 


, i i A I °, 9 , 5 ,0 


' 


X 


AP 








1 |2 i 8 


i i , C | Q 9 1 U 18 




p 








i |2 i 9 


i , i B , °i 9,U,9 




Q 








1 |3 i 


, i , s , q 9,5,1 




-AQ 








1 |3 i 1 


, , ,C| Q 9.U.9 


' 


X « 




FORM LP-10 
















CARRIAGE RETU 


RN 


•oval M«atf, JUMIX 



/ = CONDITIONAL STOP CODE 



PREPARED FOR: 

LGP-30 RPC-liOOO USERS ORGANIZATION - POOL 


PAGE OF 

8 / 18 


JOB NO. 


PROGRAM NO. 

C2-155 


PROGRAM PREPARED BY 

G. P. Becker 


PROGRAM CHECKED BY: 

POOL Review 


DATE 

12/09/59 


PROBLEM: 

Nth Order 3 * N < 10 


TRACK 
03 


PROGRAM INPUT COOES 


0. 


h 
w 


LOCATION 


INSTRUCTION 


L 



h 
VI 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION ADDRESS 


1 


1 








— 








I 


x 













0,3,3 ,2 


B 9 5 

1 1 1 | 1 I ! 


AP 








, ,3,3 


, ( x B t 0,0 ,0 p 




/AP/ 
/AP/ 








i |3 i 4 


,C 8 2 

1 1 I | I ! 1 








, ,3,5 


, ■ , B ,V^ 




X 


AQ 








1 l 3 1 6 


, , x,B 0, 0,0 ,0 


— 




/AQ/ 








1 I 3 1 7 


, , ,C, 0, 8,2 ^ 


/AQ/ 








1 i 3 l 8 


i i i b i °i 7,5 P 


Tol 








1 l 3 1 9 


i i i s , °i 8 i 2 i° 




Map/ 








1 I 4 1 ° 


■ , i T , °i3^ 


Reject P a 


id Q 






l I 4 1 ' 


i , |B, 0, 7,5 ,9 




Tol 








1 l 4 i* 


I 1 ! S 1 °l 8 1 2 r 1 




/AQ/ 








, i 4 , 3 


i , , T . 0, 3 , U ^ 




X 


Reject P a 


id Q 






1 I 4 | 4 


r ^ i_ xL, 0,3,6^ 


— 


Accept P a 


id Q 






1 I 4 1 5 


, , x,E . 0, 0.0 ,0 





Exit Fl. P 


j m 






i i 4 i 6 


1 

, , ,B 7 6 1 
1 1 1 1 1 ' 1 1 


Interation 


counter (l6) 






1 I 4 i 7 


1 , 1 S °i 7 1 6 i 2 




X 


F .5 








i i 4 l » 


i , , T , °i 3,5 , 3 












l |4 i 9 


B 7 6 2 

1 1 1 I 1 1 1 




counter 








l |5 i 


a' 7 6 

1 1 1 1 1 1 1 


— - 


.5 








1 |5 i 1 


1 . 1 c °i 7 , 6 ,2 


X 


counter 








l |5 i 2 


1 i 1 u °i 1 1 1 1 8 






Not finished 






l |5 i 3 


x R 5 

1 1 1 1 1 1 1 




Change tol 


\ Enter Fl. Pt. 






1 |5 i 4 


, , x, U . 0, 5 , ,0 






! 






1 |5 | 5 


, 1 x i I I Q 0,0 ,0 




X 




Data Input 






l 15,6 


, , x, E, 0, 0,0 ,0 






Exit Fl. Pt. 






1 |5 i 7 


, , , b ( q 7,6,0 




.5 








1 |5 i 8 


, , , c | °, 7,6,2 




Iteration 


counter 






l |5 i 9 


U 03^2 

1111:11 




X 


— * 


not finished 






1 |6 i 


1 i x 1 E i °. °i° i° 




Exit Fl. P 


t. 






i |6 i 1 


i 1 1 B 1 °. 9 , U .8 


P 


Store as 






I |6 i 2 


, , ,c, [, : ,] 




Factor 






i |6 i 3 


1 , I B °, 9 ^ < 9 




X 


Q 


11 it 11 


FORM LP 12 














X 


CARRIAGE RETL 


RN 


»i'Ut M-tn. j | Hi* ( X 



CONDITIONAL STOP CODE 



PREPARED FOR: 

LGP-30 RPC-U000 USERS ORGANIZATION - POOL 


1 

1 




PAGE OF 

9 1 18 


JOB NO. 


PROGRAM NO. 

C 2-155 


PROGRAM PREPARED BV: 

G.P. Becker 


PROGRAM CHECKED BY: 

POOL Review 


OATE 

12/09/59 


PROBLEM: 

Nth Order 3 < N < 10 


TRACK 

Oil 


PROGRAM INPUT CODES 


n. 


in 


LOCATION 


INSTRUCTION 


j CONTENTS 
•r ! OF ADDRESS 


NOTES 


OPERATION | ADDRESS 


1 


/ 
















/ 


X 








,U .0 1 


, 1 ,c, [, , ,] 












1 |0 1 1 


I , , B °l 3,6,2 




c( ) 








1 1 ,2 


i , 1 A q 1,5 ,8 




8H 








1 |0 1 3 


1 1 1 Y l 9 3< 6 ! 2 


' 


^ 


c( ) 








1 1 | 4 


1 . i A i °i \$ 1 7 




Uh 








I |0 1 5 


1 1 1 Yi Q U1O1O 


. 


c( ) 








1 i° 1 6 


1 1 1 B i 9 8 i 1 1 6 




NT - i at 


16 






1 1° 1 7 


i 1 1 S ! 9 1 . 6 i° 


/ 


X 


1 at 16 








1 1° 1 8 


1 1 1 T , °i ^i 1 ! 6 




All factors 


found 






1 1° 1 9 


i 1 1 S i 9 7 i 6 i° 




.5 at 16 








1 1 1 1 


, , , t q U, 1 ,it- 




Only 1 root 


.-►Set P in work 






1 1 1 i ' 


1 i 1 s i 9 7, 6 t 


' 


X 


.5 at 16 








1 |1 I 2 


! 1 1 T , °, K 2 | 1 




Only 1 factor 


-* Set P and Q in work 






1 |1 I 3 


1 1 1 U | 9 ^1 3 | 




More than '. 


. set left 






1 J 1 1 


, , i B , 9 ?, 2 ^ 




Bring last 


^ 






I |1 1 5 


1 1 1 c i 9 8 i ^,9 


/ 


X 


Clear as P 








1 |1 1 6 


! 1 1 B | 9 8 I 1 l 




Nt at 16 








1 1' 1 7 


1 1 ■ A \ 9 8 , 1 i° 




Nt at 16 








1 J 1 8 


. ! 1 s ! 9 x i 6 ,° 




1 at 16 








1 |1 i 9 


. , , c 8, 1 , 8 


/ 


X 


2Nt-l at It 


> 






1 |2 ,0 


1 1 , U | 9 % ! 9 




Go to compi 


te roots 






1 |2 1 1 


. > 1 B | 9 3, 6,2 




c( ) 








1 |2 1 2 


1 , , Y i 9 \ 2 i 6 




Set to stoi 


■e final P 






I 1 2 1 3 


i 1 B ! 9 \ °.° 


' 


X 


c( ) 








1 |2 1 4 


, . I 1 ! 9 ^l 2 I 8 




Set to stoi 


■e final Q 






1 |2 1 5 


. 1 , B 0, 9 , 2 ,5 




Bring b]_ 








1 (2 ,6 


, , ,c, [, , ,] 




Store as fa 


nal P 






1 |2 |7 


1 1 i b i 9 9i 2 i 6 


/ 


X 


Bring b2 








I |2 1 8 


, , ,c, r, , ,i 




Store as £2 


nal Q 






1 |2 1 9 


. 1 i u i 9 ^i 1 1 6 












1 |3 1 


, , i B , 9 0, 5 ,9 




Lo of bo 








1 |3 1 1 


Y C h 3 3 

1 1 1 1 ! 1 1 


/ 


X 


B( ) 




FORM LP-IO 












/ 


X 


CARRIAGE RETU 
CONDITIONAL S 


RN 

fOP CODE 


■OVAL »«§«. JISMtl 



PREPARED FOR: 

LGP-30 RPC-UOOO USERS ORGANIZATION - POOL 


PAGE OF 

10 / 18 


JOB NO. 


PROGRAM NO. 

C2-155 


PROGRAM PREPARED BY 

G. P. Becker 


PROGRAM CHECKED BV: 

POOL Review 


DATE 

12/09/59 


PROBLEM: 

Nth Order 3 < N < 10 


TRACK 

oU 


PROGRAM INPUT CODES 


0. 

p 

Ul 


LOCATION 


INSTRUCTION 


CL 

h 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION ADDRESS 


1 


/ 
















/ 


X 








o t 


U , 3 | 2 


i i i B i °i o, 5 ,6 




Lo of a 


work 








,3 | 3 


, , , Y , M I 9 




c( ) 










,3 | 4 


i i I B , °r 8 1 ° i 8 




Nt-1 at 16 










|3 i 5 


S 1 6 ,0 

i i i i i i i 




X 


1 at 16 










,3 | 6 


, t| o, U,U ,8 














,3 | 7 


« i i c i °i 8 i 1 1 9 




counter 










,3 | 8 


, , ,B [, , ,] 


bi 










,3 | 9 


, i .c ti i .1 




Xk 










,4 , 


i i iB . q Ui 3 18 




B( ) 








i 


,4 , 1 


i , i A i °i 1 i 5 i 7 




m 










I 4 1 2 


i i , Y 0, U ( 3 ,8 




B( ) 










,4 , 3 


i i i b i °i M i 9 




X 


c( ) 










|4 i 4 


i i i A ! °. 1 ,^ 7 




UH 










t 4 | 5 


i , i Y , 9 M , 9 




c( ) 










,4 | 6 


, i i B , °, 8 , 1 , 9 




Counter 










,4 | 7 


, u °, ^i 3 ? 




X 




Not finished 








,4 | 8 


< , i B , °i 8 i 1 , 




Nt at 16 










,4 | 9 


i s i °! 3 ,° i 1 




XB0000 « 


2 at 16 








,5 , 


i i , H , °, 8 i 1 , 




Nt at 16 










|5 i 1 


, i i s 9 1 , 6 i° 




X 


1 at 16 










,5 | 2 


i i , H , Q 8 i°i 8 




Nt-1 at 16 










l |5 i 3 


i i s ! | 1 , 6 1 




1 at 16 










|5 | 4 


i i i c i Q 8 i°i5 




Nt-2 at 16 










|5 | 5 


B 8 8 

i i , 1 i i , 




X 


Nt-1 at 16 










|5 i 6 


. i , D, q 1,6,3 




2 at 2 










|5 i 7 


i , M , °i x i 6 i 2 




1 at 2 










,5,8 


i i , c, q 8,1 ,6 




— 5 — at lfc 










|5 i 9 


, , , c i °, 9 ,^i 8 




X 


Set P=0 










|6 | 


, i , c, q 9, U ,9 




Set Q=0 










,6,1 


i , , c q 9,5 o 




Set AP=0 










,6 , 2 


. , , C, q 9,5,1 




Set AQ=0 










,6 , 3 


u 0501 

i i i i i i i 




X 






FORM LP- 12 














X 


CARRIAGE RETL 


RN 


«c** L x-i.it JUS* 1 K 



CONDITIONAL STOP CODE 



PHEPAREO FOR: 

LGP-30 RPC-U000 USERS ORGANIZATION - POOL 


PAGE OF 

11 / 18 


JOB NO. 


PROGRAM NO. 

C2-155 


PROGRAM PREPARED BY: 

G.P. Becker 


PROGRAM CHECKED BY: 

POOL Review 


DATE 

12/09/59 


PROBLEM: 

Nth Order 3 £ N < 10 


TRACK 

05 


PROGRAM INPUT CODES 


a. 
1 

VI 


1 

LOCATION 


INSTRUCTION 


a. 

h 
</> 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION ADDRESS 


' 


1 
















1 


X 








°i* .0 ,o 


(...,...) 












1 |0 i 1 


, ■ , B 0, 7 , 6 ,0 




.5 at 16 








I 1 ,2 


i i i c , °i 7 , 6 ,2 




.5 at 16 








1 |0 i 3 


i i i B - 0, 8 1 fl. 




X 


Nt at 29 








1 |0 I* 


, , i S , 0, 1 , 5 18 




8H 








I i<> I 5 


i i .H| oi fi.o a. 




Nt at 29 








1 i» i« 


i ! I S | I 1 l^ I 8 




8H 








I 1° I 7 


i H i °i 8 1 ° i 3 




XI Nt-2 at 29 








1 1° I 8 


i i u , °i 1 1 1 1 8 




—+ 


Not finished 






1 1° I 9 


i i , B i °i 7 . 5 i 6 




Lo of 1st 


P factor 






1 ,1,0 


. . i Y i °i ^ i 2 i 1 




P( ) 








i I 1 i ' 


Y 5 2 2 




X 


M( ) 








1 |1 |2 


i I i Y , °. ^ , 2 ,9 




B( ) 








1 1 1 i 3 


Y 6 2 2 




B( ) 








i >1 i 4 


i i , B , °, 7,5 ,7 




Lo of 1st 


Q factor 






| M l 5 


I 1 Y 1 °l ^ 1 1 1 8 




X 


B( ) 








l il i 6 


, , x, R , 0, 5 , ,0 




Enter Fl. 


Pt. 






i |1 i 7 


, , x, U | 0, 5 , ,0 












i J i 8 


, , ,B [, , , ] 




Q 








1 i 1 I 9 


, , x, M ( 0, , ,2 




X 


h 








i |2 |0 


i i . c i °i 8 i 2 i° 






UQ 






,,2,1 


, , ,P, C , ,] 




p 








I |2 |2 


. , ,M, [, , J 




p 








I |2 i 3 


, S i °i 8 i 2 i° 




X 


UQ 








i |2 i 4 


i i i H °i 8 i 2 i 1 






P 2 -iiQ 






1 |2 i 5 


, , , T 0, 6 , 1 ,6 




Complex 


Roots 






i |2 , 6 


, , x,R, 0, 0,0 ,0 




a/p 2 _14Q 








i |2 t 7 


, , x,D . 0, 0,0 ,1 




X 


/P2-UQ/2 














I |2 |8 


i i i H | 0, 8 , 2 ,2 






VP 2 -UQ/ 2 






i |2 i 9 


, , ,b ! [, , ,] 




p 








1 |3 |0 


, , x,D, 0, 0,0 ,1 




2 








j i3 i 1 


x Y 




X 


-P/2 




FORM LP-10 














X 


CARRIAGE RETU 


RN 


■OVAL N«Btl. J1»*4I1 



= CONDITIONAL STOP CODE 





PREPARED FOR: 

LGP-30 RPG-U000 USERS ORGANIZATION - POOL 
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JOB NO. 


PROGRAM NO. IPROGRAM PREPARED BY 

C2-155 |G.P. Becker 


PROGRAM CHECKED BY 

POOL Review 


OATE 

12/09/59 






PROBLEM: 

Nth Order 3 £ N 4 10 


TRACK 
05 


— 




PROGRAM INPUT CODES 


0. 



1- 

(fl 


LOCATION 


INSTRUCTION 



1- 


CONTENTS 
OF ADDRESS 


NOTES 






OPERATION ADDRESS 






1 


» 




















/ 


X 

















0, 


5,3 ,2 


i , i H i °i 8 i 2 r 3 




-P/2 












|3 i 3 


. . A i 8,2 2 




~7p 2 -UQ/2 














|3 | 4 


C ' 8 2 k 

i i l I i -i i 


Real Root 












,3 | 5 


i . i B °i 8 i 2 t 3 




X 


-P/2 














|3 | 6 


1 i l S | °l 8 ! 2 2 




</p 2 -UQ/2 














,3 | 7 


i i iC | 0i8i2 5" 


— - 







Real Root 












,3 | 8 


, , x,E | 0, ,0 p 


Exit Fl. Pt 


• 












,3 | 9 


i i iC | O181O 




/\\ Clear accum 


ilator 












,4 | 


1 1 i c 0, 8,2 |6 




Set imagina 


ry part = 












,4 , t 


1 i 1 ° °i 8 1 2 7 




1! II 


" =0 












,4 | 2 


, 1 .B - 0,5,2 ? 




B( ) 








1 1 1 1 1 1 1 






,4 , 3 


, , i A i °t 1 ^ , 8 




X 


8H 








1 






|4 | 4 


1 , , T , 0, 5 , 2 ,9 




B( ) 














|4 | 5 


1 i i B | °i 5,1 ,8 




B( ) 














|4 i 6 


1 1 1 A . o, 1 , 5 ,8 




8H 














,4 | 7 


; 1 l Y | °, ^l 1 , 8 




X 


B( ) 














|4 i 8 


1 1 , B j o, 5 , 2 ,1 




p( ) 














|4 | 9 


1 1 1 A 1 o, 1 , 5 ,8 




8H 















,5 i 


, 1 ,Y ( 0, 5,2 ,1 




p( ) 






>• 
* 








|5 i 1 


, , i Y °|5, 2 , 2 




X 


M( ) 




"* 


U 








,5,2 


1 1 , Y, 0| 6,2 ,2 




B( ) 






>- 

& 

i 








|5 i 3 


« , , u i °i 5,5 ,5 












1- 
C 


„ 0, 0,0 0,0 ,0 1 


1 




|5 | 4 


, ■ , 1 ■ I 1 ! 










s. 








|5 | 5 


i 1 , B 1 °i 8 1 2 A 




X 


Real Part 














|5 i 6 


. , , C| r, , ,1 


















|5 i 7 


1 ! 1 B | | 8 ! 2 I 6 




Imaginary 


Part 












|5 i 8 


. c 1 r. , , i 


















|5 i 9 


, , , B P 8 : 2 ,5 




X 


Real Part 














|6 i 


, , ,c, I , , 1 


















,6 | 1 


1 I 1 B, Q 8, 2 ,7 


Imaginary 


Part 












,6 | 2 


c [ ] 

1 1 1 II 1 


















,6,3 


b' 5 5 6 

1 1 1 1 1 11 




X 


c( ) 








FORM LP- 12 














X 


CARRIAGE RETL 


RN 


■f»*L M-MI4 JIJS4 t K 





I - CONDITIONAL STOP CODE 



PREPARED FOR: 

LGP-30 RPC-U000 USERS ORGANIZATION - POOL 
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JOB NO. 


PROGRAM NO. 

C2-155 


PROGRAM PREPARED BY PROGRAM CHECKED BY: 

G.P. Becker j POOL Review 


DATE 

12/09/59 


PROBLEM: 

Nth Order 3 £ N < 10 


TRACK 

06 


PROGRAM INPUT CODES 


L 


(A 


LOCATION 


INSTRUCTION 


CL 



h 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION ADDRESS 


1 


1 


















X 








0,6 ,o (0 


i , i A i °i ^,5 ,U 




10H 








I 1 i 1 


- . , ,y q 5,5,6 




c( ) 








I 1 ,2 


i i i A °i 1 , * , 7 




hfl 








i |0 i 3 


, , , x q 5,5,8 




X 


c( ) 








I |0 I < 


, , i Aj Q 1,5,7 




UH 








I i<> |5 


, , ,y ! 0,5,6 p 




c( ) 








1 i<> I* 


, i , A °i 1 P 7 




UH 








1 i<> |7 


10562 




X 


c( ) 








1 1 ,8 


i i i B , °i 8 1 1 h 




Nt/2 at 16 








i 1° I 9 


S 1 6 
1 1 1 1 I 1 1 




1 at 16 








1 1 1 i o 


H ' o 8 1 h 
i i i 1 i i r 




Nt/2 at 16 








. ,1 ,1 


. | ,s | 0, 7,6 p 




k 


.5 at 16 








I 1 1 i 2 


i i i T ! °, 6 M P 




all roots 


somputed 






I |1 |3 


i i t S 0, 7 ,6 p 




.5 at 16 








i .1 i 4 


T 6 2 9 




Only 1 roo 


i left 






| |1 |5 


,U , i 5,1 ,6 




X 


More than 


. left 






l 1 1 i 6 


, , x,B , 0, 0,0 p 




Make P 2 -UQ 


Positive 






i i« |7 


x R 
i i i j i i i 




s/p z -kQ 








i |1 |8 


x D 1 




^P 2 -UQ/2 








I i» i 9 


, H , °i 8 i 2 i 6 




X 


1st Imagi 


lary Part 






1 |2 |0 


, , x,Y 0, 0,0 ,0 




Change Sig 


l 






i i2 ,1 


i C i °i 8 i 2 i 7 




2nd imagin 


ary part 






1 |2 |2 


. . ,B| [, , ,1 




P 








I |2 |3 


^,0, 0,0,0 1 




X 


2 








i 1 2 ,4 


, ,x,I 0,0,0,0 




-P/2 








1 |2 i 5 


i i i H °i 8 1 2 h 




1st Real P 


art 






l |2 i 6 


1 1 l c °l 8 I 2 £ 




2nd real p 


art 






i |2 i 7 


, , x,E 0, 0,0 ,0 




X 


exit fl. p 


t 






1 |2 i 8 


i , , u | °,5,U ,2 




Go to stor 


3 roots 






i )2 i 9 


i , i B °i 5 , 6 ,2 




C( ) 








1 |3 i 


1 1 I s °l 8 I° ?■ 




Nt at 29 








l (3 i 1 


i , iY | 0, 6,3 & 




XI c( ) 




FORM LP-IO 
















CARRIAGE RETU 


RN 


aoru. H«HI, JUMIX 



CONDITIONAL STOP CODE 



PREPARED FOR: 

LGP-30 RPC-I4OOO USERS ORGANIZATION - POOL 
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JOB NO. 


PROGRAM NO. 

C2-155 


PROGRAM PREPARED BY: (PROGRAM CHECKED BY: 

G.P. Becker ■ POOL Review 


DATE 

12/09/59 


PROBLEM: 

Nth Order 3 S N < 10 


TRACK 

06 


PROGRAM INPUT CODES 


0. 


t- 


LOCATION 


INSTRUCTION 


a. 



CONTENTS 
OF ADDRESS 


NOTES 


OPERATION 1 ADDRESS 


1 


; 
















/ 


X 








t. 








0,6 ,3 ,2 


x R 5 

1 1 1 I 11 1 




- 


Enter Fl. P 








1 |3 1 3 


, ,*v^,°p 




T 


b". 










1 1 3 ,4 


i 1 i B °i 8 h ? 






L 








1 l 3 1 5 


1 i x i y °i° i° P 




^ 


-bl 








1 I 3 1 6 


1 1 i c , °i 8 1 2 ? 






-b. 






1 I 3 1 7 


, ,x,E , 0,0 ,0 p 


-— - 


Exit Fl. Ft 


• 






1 1 3 1 8 


1 1 i u 1 °i 8 £ P 










1 I 3 1 9 


. . , C |[. , J 




^XjStore as si 


ogle roots 






1 I 4 1 ° 


, 1 i B ° 1 7 ,5 8 




Lo of 1st 


root 






1 I 4 l ' 


1 1 |T , 0,6,U ? 




B( ) 








1 I 4 1 2 


1 1 ,B . 0,8 ,1 7 




2Np-l at 16 








1 l 4 1 3 


A 16 

1 1 1 | 1 1 1 




X 


1 at 16 








1 I 4 1 4 


1 1 1 s 9 1 , 6 , ° 




1 at 16 








1 I 4 1 5 


T 65 7 

1 1 1 1 1 1 1 












1 > 4 1 6 


1 , 1 c , 9 8, 1,9 




counter 








1 |4 1 7 


■ , X F |°,S P9 




X 




■ Enter Fl 


. Pt. 






1 ,4 ,8 


, ,x ,u q 5, o,o 














1 1 4 | 3 


, , ,B, i; , ,1 




Root 








1 |5 1 


, ,x , p q o, o ( o 




Print 








1 |5 1 1 


x E 

1 1 1 1 1 1 1 




x_ 


Exit Fl. Pt 


• 






1 |5 1 2 


1 1 , B i 9 6 i h t 9 




B( ) 








1 |5 1 3 


, 1 , A , 9 i, 5,7 




I4H 








1 |5 1 4 


1 1 1 Y i 9 6 i U, 9 




B( ) 








1 |5 | 5 


, 1 , B , 9 8 i 1 ,9 




X 


counter 








1 |5 1 6 


, , 1 Uj Q 6, k t k 






Not finished 






1 |5 1 7 


X P 16 

1 1 1 1 1 1 1 




"C.R." 








I |S 1 8 


, 1 1 z i 1 9 *i° 




Delay 








1 |S 1 9 


, : , B| Q 7, 5 , 8 




X 


Lo of 1st R 


3 0t 


1 1 1 1 1 1 1 




1 |6 1 


, , , Y. Q 5, 5,6 




c( ) 


Restore address 






1 16 t 1 


, 1 , A, ^ 5,7 




llH 










1 16 1 2 


, , , Y, 9 5. 5,8 




C( ) 










1 |6 1 3 


, , , a. 0,1,5 ,7 




X 


liH 




y 


FORM LP-12 














X 


c 


ARRIAGE RETL 


RN 


»tr*l H-t,| j| 1S41 I 



CONDITIONAL STOP CODE 



PREPARED FOR: 

LGP-30 RPC-liOOO USERS ORGANIZATION - POOL 
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JOB NO. 


PROGRAM NO. 

C2-155 


PROGRAM PREPARED BY: 

G.P. Becker 


'ROGRAM CHECKED BY: 

POOL Review 


DATE 

12/09/59 


PROBLEM: 

Nth Order 3 iN < 10 


TRACK 

07 


PROGRAM INPUT CODES 


(L 

III 


LOCATION 


INSTRUCTION 


O CONTENTS 


NOTES 


OPERATION ADDRESS 


Ul 


OF ADDRESS 


' 


/ 
















/ 


X 








Jh 


7 i0 i o 


| Y 1 |^| 6 I 




c( ) 


Restore addresses 








|0 i 1 


A 1^7 




14H 












,0 ,2 


Y ' 5 6 2 




c( ) 












,0 ,3 


B 0056 


' 


X 


Lo of a D 


work 










,0 ,4 


Y h 3 9 




c( ) 












,0 ,5 


B o 5 9 




Lo of b„ 












,0 ,6 


Y ' k 3 8 




B( ) 












,0 | 7 


B 0756 


1 


£ 


Lo of 1st 


P 










,0 ,8 


i i i Y , °i 3 1 6 i 2 




r C( ) 












,0 , 9 


,b| ( 7 ( 5 7 




Lo of 1st 


2 












Y k 




c( ) 


\ 


' 










B 7 5 8 


1 


X 


Lo of 1st 


toot 










1 Y ! | 7 f 2 I 3 




A( ) 












Y 7 3 7 




B( ) 












A 15 8 




8h 












Y 7 3 8 




X 


M( ) 










,1,6 


B 8 9 




Np at 16 










i' i 7 


S 16 




1 at 16 










,1 , 8 


i i i T | Q 7.3,1 




Finished 2 


Roots 








|1 i 9 


C 8 19 




X 


counter 










|2 |0 


i i x i R , 3 2 i °i° 




Complex Op 


er at ions 








i .2 M 


i x i u i 3 2 . °i° 














|2 |2 


B 8 2 8 
i i i I l i i 




work = Z 


roots 








|2 i 3 


.,,*,(,.] 




X 


r-|, r 2 , r. 


, etc. 








,2 , 4 


i , ,c! 0,8,2,8 




Z roots 










|2 i 5 


( x, E, 9 0, 0,0 




Exit comp] 


ex oper. 








|2 , 6 


, i , B. Q 7, 2,3 




B( ) 










|2 ,7 


, , , A , 9 \ 5,8 




X 


8H 










|2 , 8 


, i , Y , 9 7 i 2 i 3 




B( ) 










|2 i 9 


i i i B i 9 8 i 1 \ 9 




counter 










,3 , 


« , i u , 9 7, 1,7 




-V 


Not finished 








|3 , 1 


i , i B, Q 8, 0, 7 




X 


Np-1 at 16 




FORM LP- 10 












1 


X 


CARRIAGE RETL 
CONDITIONAL S 


RN 
TOP CODE 




■OVAL H«HI, JI1M1X 



PREPARED FOR: 

LGP-30 RPC-itOOO USERS ORGANIZATION - POOL 


PAGC OF 
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JOB NO. 


PROGRAM NO. 

C2-155 


PROGRAM PREPARED BY 

G.P. Becker 


PROGRAM CHECKED BY: 

POOL Review 


DATE 

12/09/59 


PROBLEM: 

Nth Order 3 * N £10 


TRACK 

07 


PROGRAM INPUT CODES 


0. 



i- 

Ul 


LOCATION 


INSTRUCTION 


c 

>- 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION 1 ADDRESS 


1 


i 
















/ 


X 








0, 


7 ,3 ,2 


S 16 

1 1 I 1 I 1 1 




1 at 16 










,3 , 3 


, , , T 0, 7 , U ,8 






f 
c 


inished pr 


oduct of roots 








,3 | 4 


i i i C . 0, 8 , 1 ,9 






ounter 










,3,5 


, , x, R . 2, 2 1 ,0 




X 




■ Complex c 


per 








,3 | 6 


, x | U | 2, 2, ,0 
















,3 , 7 


■ , ,B, t, , ,] 




F 
r 


roduct of 


roots unit = 








,3 ,8 


, i iH| [| , ,] 


1> r 2, ^3 


etc 








,3 | 9 


; i , C 0, 8 , 3 ,0 


^Xj Product of 


roots 








|4 , 


, , x, E 0, , ,0 




Exix comple 


x oper. 








I 4 1 ' 


, i , B . 0, 7 , 3 ,9 




C0830 










I 4 1 2 


, i J, 0, 7,3 ,7 




B( ) 










l 4 l 3 


i i i B | °i 7 , 3 ,8 




X 


M( ) 










|4 | 4 


A 1^8 




8H 










|4 | 5 


i , i Y | °i 7 i 3 i 8 




M( ) 










,4 | 6 


,B 8 19 
i i i 1 i i r 




counter 










,4 | 7 


n' 07J 2 




X 




Not finished 








,4 | 8 


i i x i R , 2 i 2 i° i° 




] 


, Complex 










,4 | 9 


, , x, U 2, 2,0 ,0 




, 












,5 | 


B 08 28 
i i i 1 i i i 




Z root = -£ 


1 








,5 | 1 


, , x, P 0, 0,0 ,0 




X 


Print 










,5 | 2 


i i , B °i 8 i 3 i° 




Prod, of re 


ots = a n 








i |5 i 3 


, , x, P 0, 0,0 ,0 




Print 










|5 i 4 


, , x,E, 0, 0,0 ,0 




Exit comple 


x oper 








|5 i 5 


Z 
1 1 1 1 1 1 1 




X 


Stop 










|5 i 6 


, , ,Z 1 0,0 ,9 




Lo of 1st I 










|5 i 7 


i i i z i x i °i 1 i° 




Lo of 1st C 










|5 i 8 


, i , Z i °, 9 i 5 i 3 




Lo of 1st P, 


oot 


, 000 OOOlt 


i 




|5 i 9 


UlGK W 5 F 


X 


T0 1S ra„c« 










|6 i 


i i i | k o , ,0 


— 




.5 at 16 










,6 | 1 


W 

l l i j 1 : l 












,6 , 2 


1 

1 1 1 I 1 ] 1 


- — 












,6 , 3 


. , , z x, o , u ,9 


X 






FORM t.P-12 














\ 


/ 




CARRIAGE RETL 


RN 


it'HL m-«.i J 1344 1 X 



CONDITIONAL STOP COOE 



PREPARED FOR: 

LGP-30 RPC-liOOO USERS ORGANIZATION - POOL 


...... 




PACE OF 

17 / 18 


JOB NO. 


PROGRAM NO. 

C2-155 


PROGRAM PREPARED BY 

G.P. Becker 


3 ROGRAM CHECKED BY: 

POOL Review 


DATE 

12/09/59 


PROBLEM: 

Nth Order 3 < N < 10 


TRACK 

08 


PROGRAM INPUT COOES 


0. 



t- 


LOCATION 


INSTRUCTION 


1 CONTENTS 
t" : OF ADDRESS 


NOTES 


OPERATION ADDRESS 


1 


/ 


















X 








0, 


8 ,o ,o 






Garbage 










|0 | 1 






Nt at 29 










,0 | 2 






Np at 29 










,0 | 3 




'X 


Nt-2 at 29 










,0 , 4 




"" 


Np-2 at 29 










,0 , 5 


1 1 1 1 1 1 1 




Nt-2 at 16 










,0 ,6 


1 




Np-2 at 16 










,0 | 7 




/ 


X 


Np-1 at 16 










,0 ,1 






Nt-1 at 16 










|0 | 9 






Np at 16 
















Nt at 16 














' 


X 


Nt+1 at 16 












I ! 1 1 I 1 1 




Np+1 at 16 












1 1 1 1 1 1 1 




Np/2 at 16 
















Nt/2 at 16 














/ 


X 


^atl6 










,1 ,6 






Nt-1 . , 
— 2~ a ^ 1" 










|1 i 7 






2Np-l at 1 


) 








,1,8 






2Nt-l at 1 


) 








,1,9 




/ 


X 


counter 










,2 ,0 






work 










|2 , 1 
















|2 |2 
















|2 i 3 






X 












,2 , 4 
















,2 i 5 
















,2 , 6 
















|2 , 7 






X 












|2 | 8 
















|2 , 9 
















,3,0 
















|3 i 1 






X 


n 




FORM LP-tO 














X 


CARRIAGE RETL 


IRN 


•OVAL «•«€. J1SI4II 



PREPARED FOR: 

LGP-30 RPC-liOOO USERS ORGANIZATION - POOL 
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JOB NO. 


PROGRAM NO. 

C2-155 


PROGRAM PREPARED BY :PROGRAM CHECKED BY: 

G.P. Becker ' POOL Review 


DATE 

12/09/59 


PROBLEM: 

Nth Order 3 < N < 10 


TRACK 

08 


PROGRAM INPUT COOES 


a. 

t- 
i/> 


LOCATION 


INSTRUCTION 


a. 


K 


CONTENTS 
OF ADDRESS 


NOTES 


OPERATION | ADDRESS 


1 


/ 

















/ 


X 













q 8,3 ,2 


! i , c q 8 ; o ( o 








1 |3 i 3 


x p q o, o ,o 















i I 3 1 4 


i t x i I °i °i °i° 












l |3 i 5 


i i i c, q 8,0 ,o 




X 










1 |3 i 6 


i , i C , °i 9 i^fi 














1 I 3 1 7 


, , ,C, 0,9,1* ,9 












1 l 3 l 8 


, ( _,_ C 0j Q A 2 p 










1 l 3 1 9 


C 8 2 9 












1 I 4 1 ° 


i i i c 0, 8,3 ,0 










l I 4 1 ' 


i , i c °i 8 1 3 ,1 












1 , 4 ,2 


i . i c °i 9 1 2 i 2 












i I 4 i 3 


i i i c | ° 9 1 2 I 3 




X 










1 l< 1 4 


, , C 9 3 5 












l I 4 1 5 


i , r G . Q 9,3 ,6 












i .4 i 6 


i i i B , 0, 8 , ,0 












1 I 4 i 7 


i i i u, q o,o ,7 




X 










l l 4 l 8 


(,,,,,,,) 












1 l 4 I 9 


(, . , , , , , ) 












l |5 , 


, , , B , °, 6 , 3 , 9 












1 |5 i 1 


, i , a ! q 1,5,7 




X 










l |5 i 2 


, , ,Y, o, 8,5 ,li 












i |5 i 3 


, c i °i 8 1 ° i° 












1 |5 i 4 


, , ,c (, , ,) 












1 |5 | 5 


i i i B 1 °i 8 1 2 ,3 




F 










i i5 i 6 


, , , U i °i 6 i 3 i 9 












1 |5 i 7 


i i i 1 i i i 












I |5 i 8 


i I i i i i i 












i |5 i 9 




x~ 










I |6 i 


I 1 i I ! 1 .. 1 ._ . 












l |6 i 1 


1 1 1 1 ! 1 ] 










l |6 i 2 


i i i I I : i _ 










l |6 i 3 


1 1 ! 1 1 1 ! 




X 






FORM LP 12 














X 


CARRIAGE RETL 


RN 


■<..*t M--M, i J1SS4 I X 



CONDITIONAL STOP CODE 



